home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Collections: Scope
/
Scope Disk #017 (199x)(Scope PD)(US)[WB].zip
/
Scope Disk #017 (199x)(Scope PD)(US)[WB].adf
/
DMCSpec1.0
/
DMCSpect.c
< prev
next >
Wrap
C/C++ Source or Header
|
1988-07-13
|
2KB
|
75 lines
/*********************************************************/
/* */
/* DMCSpect V1.0 -- Inom Software (c) 1988 */
/* */
/* Author : Erick Scott Dyke */
/* Computer : Commodore Amiga 1000 */
/* Processor : Motorola 68000 */
/* Language : Lattice AmigaDos C Compiler V4.00 */
/* */
/* Purpose : This program, based on the idea and */
/* Amiga Basic code of Doug Pelletier, */
/* finds all the instruments needed by */
/* DMCS to play the song properly. */
/* */
/* This program is public domain, and I hope that any */
/* copies of the source code you distribute still have */
/* this program header. -- Enjoy! */
/* */
/*********************************************************/
#include "stdio.h"
#include "string.h"
void main (argc, argv)
int argc;
char *argv[];
{
FILE *File_Pointer;
char Input_Character;
char Command [4];
char Dummy [4];
Command [3] = '\0';
printf ("\nInom Software's Deluxe Music Instrument Identifier.\n");
if (argc < 2)
{
printf ("Usage: DMCSpect <file name>\n");
exit (0);
}
if ((File_Pointer = fopen (argv [1], "rb")) == NULL)
{
printf ("\nSorry, invalid file name.\n");
exit (0);
}
printf ("\nInstruments needed for the song %s:\n\n", argv [1]);
fseek (File_Pointer, -1000L, 2);
Input_Character = getc (File_Pointer);
while (!feof (File_Pointer))
{
if (Input_Character == 'U')
{
fread (Command, 1, 3, File_Pointer);
if (!strcmp (Command, "IID"))
{
fread (Dummy, 1, 4, File_Pointer);
while (((Input_Character = getc (File_Pointer)) != 'U') && (!feof (File_Pointer)))
printf ("%c", Input_Character);
printf ("\n");
ungetc (Input_Character, File_Pointer);
}
}
Input_Character = getc(File_Pointer);
}
fclose (File_Pointer);
}